SSSSSSSSSSSS_ YYY YYY SSSSSSSSSSSS LLL 000000000 AAAAAAAAA 
SSSSSSSSSSSS_ YYY YYY SSSSSSSSSSSS LLL 000000000 AAAAAAAAA 
SSSSSSSSSSSS_ YYY YYY SSSSSSSSSSSS LLL 000000000 AAAAAAAAA 
SSS YYY YYY SSS LLL 000 000 AAA AAA 
SSS vYY YYY SSS LLL 000 000 AAA ABA 
SSS YYY YYY SSS LLL 000 000 AAA AMA 
SSS yyy yYY SSS LLL 000 000 AAA ABA 
SSS yyy yYY SSS LLL 000 000 AAA AAL 
SSS yyy yYY SSS LLL 000 000 AAA AAA 
SSSSSSSSS vYY SSSSSSSSS LLL 000 000 AAA AAA 
SSSSSSSSS vYY SSSSSSSSS LLL 000 000 AAA 
SSSSSSSSS vYY SSSSSSSSS LLL 000 000 AAA AAA 
SSS YYY SSS LLL 000 000 A 
SSS YYY SSS LLL 000 000 AAAAAAAAAAAAAAA 
SSS YYY SSS LLL 000 000 AAAAAAAAAAAAAAA 
SSS vYY SSS) LLL 000 000 AAA 
SSS YYY SSS LLL 000 000 AAA AAA 
SSS YYY SSS LLL 000 000 AAA AAA 
SSSSSSSSSSSS YYY SSSSSSSSSSSS LLELLLLLLLLLLLLL 000000000 AAA AAR 
SSSSSSSSSSSS vYY SSSSSSSSSSSS LELLLLLLLLLLLLL 000000000 AAA AAA 
SSSSSSSSSSSS yyy SSSSSSSSSSSS LLLLLLLLLLLLLLL 000000000 AAA AAA 


**F ILE®*1D**OPDRVWS1 


000000 PPPPPPPP DDDDDDDD RRRRRRRR vY VV WW tal SSSSSSSS 11 
000000 PPPPPPPP DDDDDDDD RRRRRRRR VV VV WW Wid SSSSSSSS 11 

00 00 PP PP DD DD RR RR VV VV WW Ww SS 1111 

00 00 PP PP ODD DD RR RR VV VV WW Ww SS 1111 

00 00 PP PP DD DD RR RR VV VV WW Ww SS 11 

00 00 PP PP ODD DD RR RR VV VV WwW Ww SS 11 

00 00 PPPPPPPP DD DD RRRRRRRR VV VV WW Wee SSSSSS 11 

00 00 PPPPPPPP DD DD RRRRRRRR VV VV WW WW SSSSSS 11 

00 PP DD DD RR RR VV VV WW WW WW SS 11 

00 00 PP DD DD RR RR VV V Ww WW SS 11 

00 00 PP DD DD RR RR VV VV WWW = WWW SS 11 cess 

00 00 PP DD DD RR RR VW VV WWW = WWW SS 11 coe 
000000 PP DDDDDDDD RR RR VV ‘al WW SSSSSSSS 111111 cece 
000000 PP DDDDDDDD RR RR vy dle WW SSSSSSSS 111111 cece 
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-TITLE OPDORVWS1 = VAX/VMS QVSS CONSOLE TERMINAL DRIVER 
- IDENT Pybe~000" 
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COPYRIGHT (c) 1978, 1980, 1982, 1984 B 
DIGIT TAL EQU PRENT CORPORATION, MAYNARD. MASSACHUSETTS. 
ALL RIGHTS” AESE 


; AUTHOR: Bill Matthews 
OPDRIVER AUTHOR: Trudy Matthews, Benn Schreiber 


; MODIFIED BY: 

V03-001 wWHM0001 Bill Matthews 01-Aug-1984 
Initialize the saved scan map. Save r0 across call to remap. 
Initialize the permanent terminal device characteristics. 


: * 
3* * 
3° * 
3* ® 
7* * 
3* f 
° 10 ;* THIS SOFTWARE IS cyrui ence UNDER A LICENSE AND MAY BE USED AND COPIED * 
0 11 ;* ONLY IN ee WITH THE TERMS OF SUCH parts SE AND WITH THE * 
12 3* INCLUSION OF THE ABOVE op Th NOTICE. THIS SOFT ARE OR ANY OTHER * 
13 ;* COPIES THEREOF MAY NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE TO ANY * 
000 14 ;* OTHER PERSON. NO TITLE TO AND OWNERSHIP OF THE SOFTWARE IS HEREBY * 
900 ! ‘* TRANSFERRED. * 
§ ® 
$6 17 ;* THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE * 
44 18 ;* AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT * 
44 1 i CORPORATION. * 
3 * 
$00 ;* DIGITAL ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF ITS’ * 
+44 . SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DIGITAL. 
:* ® 
$8 jeteaeeeeeeeerententeeerentenerentreetentreetenennetenetenteneteseteeeeeetes 
00 3 
000 ye 
4 ; FACILITY: 
000 : VAX/VMS 1/0 SUBSYSTEM 
0000 : 
0000 ‘ ABSTRACT: 
4 3 
00 ; 
000 ; 
4 : 
000 3 
0000 : 
000 ; 
000 4 : 
000 4 : 
0000 42 ; 
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3 
8 4 14 7 CRBSL_SCAN_MAP = CRBSL 
: if 5 CRBSL_VIDEO_BASE = r° 
000001 $ CRBSL_OPFLAGS = CRB 
8 3 CRBSL_OPFLAGS 
9 $SVIELD OP,0,<- 
<REINI 
§ <REMAP 
<OPACT 
4 <VCACT 
5 > 
6 


"SrSEp-19be Qasttite 


TIMELINK 


$L_TOUTROUT 3; VIRT 
AURSTRUC H 
3; VCORI 

DEFINITIONS 
T,,M>- 3; First 

,M>- 3; First 
{VE, ,M>- 3 
IVE, ,M>- Py} 


AX/VMS Macr 
SYSLOA.SRCJ 


OPD DRVUSS « MAR; 1 


ADDRESS ¥ SCAN MAP SAVE AREA 
ADDR OF BASE OF VIDEO MEMORY 
woaniven’ FLAGS BETWEEN OPDRVWS1 AND 


eet’ 


4 scan Lines must A ew 


4 scan 


OPDR VWS1 is ah 
VCDRIVER has been initialized 


nes not on scre 
g the first. ‘ 


sean lines 


J.10 
OPDRVWS1 = VAX/VMS QVSS CONSOLE TERMINAL DRIVER 1 P=] 74 AX/VMS v04-0 
vOe-000 8735p “SEP=1 1982 ba: F: 2 ESYSLOA.SR fOPD DRVWS) MAR; 1 (4) 
UCBSW_QV_KEYSTATE DEFINITIONS 


SVIELD Key ,0 


APPKEYPAD, , >= 
<HOLD, -M>= 
4 7 een, >= 
5 <SHIFT, ,M>- 
96 <CTRL, .M>= : 
<BUTTOG, ,M>- ; MOUSE BU1;2% SAMPLE TOGGLE 
: 0 ; MAIN QVSS CSR BIT DEFINITIONS 
° 1 é SVIELD avcsR g.¢- ; 
1 DE19;1,M>- : (R) 15 OR 19 INCH MONITOR (1=19) 
0 104 § SPARE 
00 105 Ar VEO 1,M>- + (RW) ENABLE VIDEO 
00 1 $ C,1,M>= : (RW) CURSOR (1=0R, O=AND) 
00 1 : (RW) DIAG FUNCTIONS 
000 108 75 It. 1,M>=- : (RW) ENABLE INTERRUPT 
909 109 : (R) DIAG 
000 110 <BUTA, 1 ,H>- : (R) MOUSE BUTTON A (RIGHT) 
0000 (111 <BUTB,1,M>= : (R) MOUSE BUTTON B (MIDDLE) 
9000 118 <BUTC,1.M>= : (R) MOUSE BUTTON C (LEFT) 
000 11 <MEMBANK, 4,M>=- : (R) VIDEO MEMORY BASE SELECT 
0000 114 
0000 115 
0000 116 


$3 
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= VAX/VMS QVSS CONSOLE TERMINAL DRIVER 16-SEP-1984 :42  VAX/VMS Macro v04-0 Page 5 OP! 
iets 7 te 98: iz YeYSLOA. SRCJ OPD Seuss .MAR: 1 . (4) vO. 
11 
| ~SBTTL REGISTER DEFINITIONS 
} : VIDEO RAM LAYOUT (O-3FFFF) 
123 QVSVIDEO_SIZE == *X3F7 : SIZE OF VIDEO ARE 
124 QVSCTLBLOCK s= *X3F7 3 QVSS SYSTEM CONTROL BLOCK (QvB) 
125 QVSUCODE s= *X3F7 ; UVAX I QVSS CONSOLE A 
1 $ QVSCAN_MAP s= “X38 : BASE OF SCAN MAP 
127 QVSCUR-RAM c= “X3FFE : CURSOR RAM REGION 
SCAN_MAP == QVSCAN_MAP 
1 : QVSS CONTROL CSRS 
0 1 é QVCSR_CTL zs 9 : CONTROL CSR 
0 133 QVCSR-CURPOS == + CURSOR POSITION (OUTPUT) 
0 134 QVCSR-MOUSE s= 4 + MOUSE INPUT (INPUT) 
6 900 5 QVCSR7SPARE == 6 
0008 0000 1 $ QVCSR_CRTADDR == 8 : CRT CONTROLLER (ADDRESS SELECT) 
OA 0000 1 g QVCSR-CRTDATA == 19 : CRT CONTROLLER ( PORT 
C 0000 139 QVCSRTINTDATA == 1 : INTERRUPT LET ROLLER COATA VALUES) 
0 900 140 QVCSRIINTCTL == 14 : INTERRUPT CONTROLLER (CONTROL FIELD) 
9 00 141 QVCSRIURTBUFA == 38 + UART DATA BUFFER 
000 14 QVCSR-URTSTATA == 34 + UART STATUS 
0 900 143 QvCSR~ ~URTRODEA s= 32 
024 99 144 QVCSRIURTCMDA == 36 
02A 90 145 QVCSR-URTINT z= 42 
£80 8090 143 QVCSR_OFFSET == *017200 OFFSET OF QvSS CSR IN 170 SPACE 
E80 0000 148 Qv QVCSR-PA == IJOUVISAL_QBOSP+QVCSR ive set: QVSS CSR PHY ADDR 
OOF 0000 149 QVCSR7PFN == QVCSR_P S P 
080 900 130 QVCSR~BOF F == QVCSR7PA = <QVCSR_ PEN®S12>: QVSS CSR BYTE OFFSET IN PAGE 
000 15 
0000 138 3 OUTPUT INTERRUPT QUEUE 
gue 13s 
00000090 136 .PSECT SYSLOA,LONG 
0000 «15 


OPDRVWS1 = VAX/VMS QV S 
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mo 
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-SBTTL CONSOLE CONTROLLER INITIALIZATION 

CONSINITIAL = INITIALIZE CONSOLE CONTROLLER 

FUNCTIONAL DESCRIPTION: 

THIS ROUTINE IS USED AT SYSTEM STARTUP TO INITIALIZE THE CONSOLE CONTROLLER. 
INPUTS: 


it 


ou 
cro 
4 


L 


ran ERIE IRIE IRL 
4 ~ 


ODOOCCOCCOCGCOOCOOOOOOOOOSoOo 


S 
R 
159 
1 
1 
He 
1 
i 
5; 
ae 
0 189 
Hi 
3 |t 
9 178 OUTPUTS: 
i 0 123 ALL REGISTERS ARE PRESERVED. 
9 0 177 ONSINITIAL:: ; INITIALIZE CONSOLE INTERFACE 
QO000000'EF FFFFFFOO'EF DE 09 o 179 MOVAL QVSSSKEY-112,QVSSSKEYTABLE ; INITIALIZE THE KEYBOARD TRANSLATIO 
52D 0008 181 PUSHL R2 ; SAVE R2 
be 09900000 GF 00 000D i8¢ MOVL.  G*IOCSGL ADPL IST. Re : GET Ape ADDRESS 
10 A2. C1 ota 183 ADDL3 ADPSL_VETTOR(R2) ,#*060 GET ADDR OF VECTOR TABLE ENTRY 
00000025" ¢F 9E O19 é MOVAB CP DPASCRESCROSL  INTDSVECSO_ sssvaleatl. (RO): CONNECT THE VECTOR 
09 0 6 ; SET UP INTERRUPTS 
0F AS 00 «=—90Ss«:0020 188 r MOVB #0,QVCSR_INTCTL(R4) ; RESET INTERRUPT CONTROLLER 
CE AS «88940 BF 690 (0024 = 86189 MOVB #*X40,QVCSR_INTCTL(R4) ; RESET IRR 
HE AG «680 BF 0 90s«0029S «190 MOVB #*X80,QVCSRTINTCTL(R4) > SPECIFY INDIVIDUAL VECTORS 
OF AS «CO BF 0S o90s«00 191 MOVB #*XCO,QVCSRTINTCTL(R4) > PRESET AUTOCLEAR DAT 
OC AG OFF BF O90 0 198 MOVB #*XFF,QVCSRTINTDATA(R4) : ALL ARE AUTO CLEAR 
238 196 : VECTOR SPECIFIC 
OE AS EO ef 9 9 196 MOVB #*XE0,QVCSR_INTCTL(R4) ; PRESET VECTOR ADDRESS (ONE) 
0C AS «6300 «90 :«003D)—s«d19 MOVB #*060,QVCSR-INTDATA(R4) : USE SPECIAL VECTOR 
OE A4 28 9 9041 198 MOVB x3 SQVCSR~INTCTL(R4) ; ENABLE TX/RX INTERR 
06 AS «OAL BF OO 0045 199 MOVB #*XA1,QVCSRTINTCTL(R4) ; ARM THE INTERRUPT CONTROLER CHIP 
OOGA 8 
4A .] SET UP UART 
A ie 
4A4 19 BO 004A 6 MOVW  #*X19,QVCSR_URTCMDA(R4) ; RESET MODE POINTER, ENABLE RCV, DI 
OAs 17 B 4 MOVW  #*X17. QVCSRTURTMODEA(R4) ; SET MODE 1 ,NOPA ARI fy, 8 BIT 
AA 607 «Oo#B 5 8 MOVW 86 #*X f -QVCSR_URTRODEA(R4) : sel MODE 2, 1S Pp éit 
22 a4 «0099 BFE 5 0 MOVW  #*X99QVCSR-URTSTATA(R4) : 4800 BAUD XMIT see 
2aaa 02 8B i 10 MOVW  #*X02-,QVCSRTURTINT(R4) ; ENABLE REC INTERRUPTS 
0044 8F AB 4 1g BISW  #<QVCSRSM_ENA_VIDEO!QVCSRSM_ENA_INT>,~; ENABLE VIDEO 
64 21 QVCSR_CTLTR4)~ ; INTERRUPTS AND CURSOR=AND 
2 BEDO 63 14 POPL Re : RESTORE R 
0 B 215 RSB 
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OPDRVWS1 = VAX/VMS QVSS CONSOLE TERMINAL DRIVER 16-SEP-1984 01:08:42 VAX/VMS Macro v04-0 Pa 7 
YOLn 000 CONSOLE UNIT INT TIALL SATION mie} 7 9) 98:48 YET SLOA. eRETOPDRVUSS MAR: 1 ” «we 
9 iq. - .SBTTL CONSOLE UNIT INITIALIZATION 
; 19 ; CONSINITIAL = INITIALIZE CONSOLE UNIT 
} 1 FUNCTIONAL DESCRIPTION: 
69 iF : THIS ROUTINE IS USED AT SYSTEM STARTUP TO INITIALIZE THE CONSOLE UNITS. 
69 a INPUTS: 
69 : RS = UCB ADDRESS 
33 3 ; R9 = CRB ADDRESS 
069 0; : OUTPUTS: 
069 gi ALL REGISTERS ARE PRESERVED. 
069 % GONSINITLINE:: 
50 DD 0 9 5 PUSHL RO : SAVE RO 
50 00000000'GF DE $8 5 MOVAL  G*OPASVECTOR,RO : GET THE VECTOR ADDRESS 
0 7 CLASS_UNIT_INIT : AND INIT THIS UNIT 
50 0114 ¢5 DO 0 8 MOVL ~ UCBSL TT CLASS(RS).RO ; ADDRESS OF CLASS VECTOR TABLE 
8B0 16 O0C 9 J @CLASS_SETUP_UC card) IN TIALIZE THE UCB FOR CONSOLE TERMINAL 
08 6445 05 €1 00C 40 30$: BBC ates POWER “UCBSW_STS(RS) DID WE DETECT A POWER FAIL 
50 0114 ¢5 DO 00¢ 41 MOVL  UCBSL_TT_CLASS(R5)7RO.: GET THE CLASS VECTOR TABLE ADDRESS 
BO 16 BaC8 $5 JSB acLass _POWERFAIL (RO) ; AND GOTO THE POWERFAIL CODE 
50 BEDO 990 44 40$:  POPL RO ; RESTORE RO 
41 a5 00 90 00D 46 MOVB  #TT$_UNKNOWN,UCBSB_DEVTYPE(RS): SET UNKNOWN TERMINAL TYPE 
44 AS 00001000 af C8 00D 4 BISL  #TT$A_SCOPE,UCBSL_BEVDEPEND(R5S; QvSS IS SCOPE 
48 AS 90001000 ; £ OODF 48 BISL #TT2$M_EDITING ycast DEVDEPND2( (RS); ENABLE LINE EDITING 
1000000 8F CA O0E7 249 BICL #<TT2$M_ANSICRE!TT2 A_DECCRT>, TH HIS DR DRIVER DOES NO 
48 AS QOED 50 UCBSL_DEVDEPND2(R5) 
00c4 cS) 44 A5)7D OEE 31 MOVQ UCBSL-DEVDEPEND(R5) ,UCBSL_TT_DECHAR(R5); MAKE PERMANENT 
O9rs 3g CONSSET LINE:: 
OF 54 CONSDS_ SET: 
FS 255 CONSSET MODER: : 
os bors | $39 (ONSMULE: : 
Gor 38 CONSDISCONNECT: : : CALLED ON LAST DEASSIGN 
3F 6 saBB F6 5 PUSHR  #*M<RO.RI, RR. »R3,R4,R5> 3 SAVE REGISTER S. 
3 00900000" F DE OOF 60 MOVAL GOP PASCRB,R GET 
zo onooonorr “obbsooode EL fix See BRE HeeeleNenatutecmmoertasat th Oi, vanes ar me 
14A3 0S 011 86 TSTL HEXERU VStANe MAP ( (RS) ; SCAN MAP S SAVE AREAS ALREADY ALLOCATED? 
i 12 113 64 BNEG : IF NEQ YES ALL DON 
51 O1EO. 3¢ 11 65 MOVZWL #24*10 ; ALLOCATE SAVE U AREA FOR 24 X 10 SCAN LINE M 
00000000 § 11A 66 JSB G*EX OA ORONPAGED + GET THE MEMORY 
A 50 —9 01 6 BLBC “19 ; BR RANCH Ha ERROR 
D0 01 68 MOVL RBSL_SCAN MAP(R3): P SAVE AREA ADDRESS 
51 1€ rs » Bhthe & eF ci ; : ADDL iit NAAP P  SRESL VIDEO 0_Ba ages) ym s COMPUTE ADDRESS OF SCAN MAP 
5 “do908 606 DE 0136 8 MOVAL Weeks R : GET chs ADDRESS 
Ge CA 0130 fe 108 BICL Goose wits VE ,CRBSL OPFLAGS(R3); CLEAR OPACTIVE FLAG 
BA 0141 273 20$ POPR #*M<RO,R1,R2,.R3,R4,R5> ; RESTORE REGISTERS 
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VER 
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; RETURN 


AX/VMS mae 
SYSLOA. SRE 


58 V 
fOPD 


04- 
RVWS 


«MAR; 1 


wm 


SS 


1 
OPDRVUs1 = VAX/VMS QvSS CONSOLE TERMINAL DRIVER 16-SEP-1984 4 01 208: 42 YAX/VMS Ma vOu=00 Page 9 
v04=0 CONSOLE RECIEVER INTERRUPT DISPATCHER ~SEP=1984 04: SYSLOA. SRCJOPDRVWS! «MAR: 1 (7) 
144 zs 2 .SBTTL CONSOLE RECIEVER INTERRUPT DISPATCHER 
144 £8 : CONSINTINP = CONSOLE INTERRUPT ON INPUT READY 
144 p : FUNCTIONAL DESCRIPTION: 
144 ; : THIS ROUTINE IS ENTERED AS A RESULT OF A RECEIVER INTERRUPT ON THE 
144 3: QVSS KEBOARD. 
144 5 } QVSS TERMINAL: ALL RECEIVED DATA CHARACTERS ARE CONSIDERED 
144 $ : UNSOLICITED AND RESULT IN AN ENTRY INTO THE 
144 : TERMINAL, DRIVER COMMON CHARACTER BUFFERING 
144 8 : ROUTINE "‘@UCBSL_TT_PUTNXT(RS)'’. 
144 30 : INPUTS: 
144 3 : RO,R1,R2,R3,R4,R5 ARE SAVED ON THE INTERRUPT STACK. 
144 34 : OO(SP) = ADDRESS OF THE IDB 
0144 96 : OUTPUTS: 
D144 38 ; THE SAVED REGISTERS ARE RESTORED BEFORE REI. 
bee 00 CONSINTINP:: 
54 9E «=O 0144 03 MOVL  a(SP)+ ; GET IDB ADDRESS 
50 64 ~«O«O 147 05 MOVL  IDBSL_ eSR(RAD, RO : GET CSR ADDRESS 
O14A 8 ? GET THE ASSOCIATED UCB 
55 18 AG DO O14A bs; MOVL §IDBSL_UCBLST(R4),R ET UCB 0 ADDRESS 
64 AS 0080 8F AB ie o3 BISW #UCBSA_INTTYPE, bessw. STS(RS); SET RECEIVER INTERRUPT 
50 26 A0 9A 0154 310° MOVZBL QVCSR_URTBUFA(RO),RO |; GET INPUT DATA FROM LK201 
FEAS' 30 138 1 BSBW  QVSS$REYDECODE : DECODE THE KEYBOARD CHARACTER 
138 13 j : CONSOLE TERMINAL INTERRUPT 
53 50 9A 0158 315 108: MOVZBL RO,R3 : ZERO TOP 3 BYTES 
08 13 13e 18 BEQL : DON'T PASS NULLS THRU 
0110 D 18 16 1 JSB CBSL_TT_PUTNXT(RS) |; BUFFER THE CHARACT 
02 13 0164 18 BEQL i IF GGL THEN NO CHARACTER 10 GuTPUT 
A 10 166 1 308 BSBB CONSSTARTIO : OUTPUT THE CHARA 
50 be 7D 016 \ $ mova (SP)+ : RESTORE REGISTE 
52 BE «Oo 7DsCO016B mova (Spy eck : 
54 BE 7D 195 § MOva (SP)+.R4 3 
02 71 ; REI : 
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se iB) 
‘ ~SBTTL START I/0 ON CONSOLE INTERFACE 
CONSSTARTIO = START 1/0 ON CONSOLE INTERFACE 


FUNCTIONAL DESCRIPTION: 


S 
1/0 
1 
he 
17 : 
15 : 
17 : THIS ROUTINE IS ENTERED TO OUTPUT A CHARACTER TO THE CONSOLE INTERFA CE. 
17 : IF THE INTERFAC E IS READY THE DATA IS OUTPUT DIRECTLY. IF THE INTERFACE 
17 4 ; I$ NOT READ Y THEN THE DATA IS QUEUED AND SUBSEQUENTLY OUTPUT ON THE 
V7 5 : NEXT READY INTERRUPT 
17 : ; IN_EITHER CASE, A RETURN TO THE CALLER IS DONE TO ENTER A ‘WAIT FOR 
Vv 8 : INTERRUPT’ STATE. 
O17 40 > INPUTS: 
017 4g : R3 = DATA TO OUTPUT 
7 43 ; R5 = UCB ADDRESS 
7 45 : OUTPUTS: 
17 23 : R3,R4,R5 ARE PRESERVED. 
gi ih 
O17 20 CONSSTARTIO:: ; 
08 19 oes 3 10$:  BLSS 208 ; BRANCH IF BURST MODE 
50 53 9A 0174 35 MOVZBL R3,RO : GET CHARACTER TO OUTPUT 
0090 30 0177 354 BSBW CONSPUTCHAR : OUTPUT CHARACTER 
12 11 O17A = 355 BRB 0$ : CHECK FOR MORE TO OUTPUT 
017¢ 356 
gine a 2 
V7 9 : TAKE CHARACTER OUT OF BURST BUFFER AND TRY TO OUTPUT IT IMMEDIATELY 
50 011¢ DS 9A O17C 361° MOVZBL @UCBS$L_TT_OUTADR(R5),RO ; OUTPUT NEXT BYTE 
0086 30 60181 6¢ BSBW  CONSPUTCHAR : OUTPUT CHARACTER 
011¢ CS) D6 0184) 36 INCL UCBSL_TT_OUTADR(RS) > UPDA POIN 
0120 CS «B7 «(0188 «= 364 DECW cBsw_ TTZOUTLEN(RS) 3 UPDAT UNT 
EE 12 018C 365 BNEQ $ tie OUNARACTER 
64 AS BA 18 66 30$:  BICB #UCBSM_TIM!UCBSM_INT, uceéu" STstR3) CLEAR Time gut AND EXPECTED 
010c 051 19 67 JSB auc CBSL-TT_GETNXTCRS) ; GET NEXT CHARA 
DA 12 19 68 BNEQ 10$ : IF nea’ MORE CHARACTERS TO OUTPUT 
0 19 69 RSB > EXIT 


D1] 


OPDRVWS1 = VAX/VMS QVSS CONSOLE TERMINAL DRIVER 16-SEP-1984 01:08:42 VAX/VMS Macro V04- Page 11 
vival CONSOLE FRANSAIS ER R INTERRUPT SERVICE moet 8 98:92 YOYSLOA. SRC JOPDRVUS MAR:1 09) 
13 i oe .SBTTL CONSOLE TRANSMITTER INTERRUPT SERVICE 
; fh : CONSINTOUT = CONSOLE TRANSMITTER INTERRUPT SERVICE 
193 f } FUNCTIONAL DESCRIPTION: 
199 f THIS ROUTINE IS A NOP FOR QVSS. 
199 0 GONSINTOUT:: : 
50 BE 7D 0199 1 mMOva ($P)+ RO : RESTORE REGISTERS 
2 BE 7D 019¢ ; MOVa  (SP)4-R : 
4 8€ 7D O19F MOVQ (SP) +.R4 : 
0 1Ag ra REI : 
1A 5 


OPDRYWS1 = VAX/VMS QVS 
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CONSOLE RORY cf fae OLE TERMINAL DRIVER ys $ att yi g: 96: $e eS oe ae v04-0 Page 15) 


ION ROUTINES P=1 SYSLOA.S 5OPD DRVWS1.MAR; 1 
BTTL CONSOLE PORT ACTION ROUTINES 
; CONSXOFF - SEND XOFF 

+ END XON 


uw 
+ 


; CONSS STOP OUTPUT 

; CONSSTOP2 = ALTERNATE STOP 
CONSABORT = ABORT CURRENT OUTPUT 
CONSRESUME = RESUME STOPPED OUTPUT 

; FUNCTIONAL DESCRIPTION: 


THESE ROUTINES ARE USED 44 THE THE TERMINAL CLASS DRIVER TO 
; CONTROL OUTPUT ON THE PORT 


> INPUTS: 
: RS = UCB ADDRESS 
: OUTPUTS: 
C 

C 

C 

C 

C 


>>>>rrrrrr>r>rrr>,r>, 


RS = UCB ADDRESS 


05 


COOCGCOGCOCOCOOOCCOCOOCOCOCOOOOOOOCOOOOOO 


2 
>>>>>rr>rrrrrr,r>r> 


B 
Poe ee oe oP oP oe oP oe oP ot ot ot ot ot ot 
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OPDRVWS1 = VAX/VMS QVSS CONSOLE TERMINAL DRIVER 16-SEP-1 :42  VAX/VMS M v04-0 Page 1 nes 
ae tty SEND COMMAND TO CONSOLE g7 Ser 382 8} 96: if YOYSLOA. SR 5OPD Sevuss. MAR; 1 ° ld) 
10604] ~SBTTL SEND COMMAND TO CONSOLE 
ing 
p++ 
1M ; ; CONSSENDCONSCMD = SEND CPU-DEPENDENT COMMAND TO CONSOLE 
1M é ; FUNCTIONAL DESCRIPTION: 
Ab 4 5; INITIATE FUNCTION ON CONSOLE 
1A6 CG § : INPUTS: 
106 8 : 
106 409: RO = CONSOLE FUNCTION TO PERFORM 
106 430; CONSC_BOOTCPU = SEND REBOOT SIGNAL TO CONSOLE AND THEN HALT 
106. 431; CONSC_CLRWARM = CLEAR CONSOLE WARMSTART FLAG 
O1A4 G4 é ; CONSC™ EtRCOLD = CLEAR CONSOLE COLDSTART FLAG 
S1As 433 ; R2 = NUMBER OF BYTES OF DATA TO BE RETURNED (= 0 IF NO DATA EXPECTED) 
106434; (CURRENTLY ONLY IMPLEMENTED IN 11/790 VERSION OF THIS ROUTINE) 
106435; k3 = ADDRESS OF BUFFER TO HOLD RETURNED DATA (ONLY IF R2 IS NON-ZERO) 
1% ? $ 3 (CURRENTLY IMPLEMENTED ONLY IN 11/790 VERSION OF THIS ROUTINE) 
1A4 638 : OUTPUTS: 
1A4 439; 
106. 440 CONSOLE STATE MODIFIED 
O1A4 441: R1 DESTROYED 
O14 44g — 
O1A4 4G 
01A4 444 CONSSENDCONSCMD:: 
50 OFOO BF AB O1AG 445 BISW #*XFOO,RO : SELECT MISCELLANEOUS CONSOLE COMM. 
51 3¢ DB O1A9 446 108: MFPR #PR$_TXCS,R1 : GET TRANSMITTER STATUS 
F9 51 1 O1AC 447 BBC RT, 10$ ; WAIT FOR CONSOLE READY 
02 50 1 0180 448 CMPB  —s- RO, ACONSC_BOOTCPU ; REBOOT CPU? 
0B 13 0183 449 BEQL § : IF SO BRANCH TO HALT AFTER COMMAND 
23 50 DA 0185 450 MTPR  RO,#PRS$_TXDB : OTHERWISE ASSERT COMMAND 
1 32 DB 0188 451 208: MFPR  #PR$_TXCS,R1 : GET TRANSMITTER STA 
F951 07”—s«€1 0188 43¢ BBC #7,RT,20$ ; WAIT FOR CONSOLE DONE 
05 O1BF 433 RSB : RETURN 
23 50 ODA 01¢9 455 30$: MTPR  RO,#PRS_TXDB ; SEND REBOOT COMMAND TO CONSOLE 
00 O1C 456 HALT 
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OPDRVWS1 = VAX 
vO4-000 “ALLO 


> 
ou 
zm 
wn 
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- 
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~SBTTL ‘‘ALLOCATE’’ CONSOLE TERMINAL 


+4 
; CONSOWNCTY = "‘ALLOCATE’’ CONSOLE TERMINAL 
; FUNCTIONAL DESCRIPTION: 


THIS ROUTINE SHOULD BE CALLED WHEN PERFORMING NON-INTERRUPT DRIVEN 
1/0 a pon SOLE TERMINAL. IT DISABLES INTERRUPTS AND DOES ANY 


/VMS 

CATE 
1¢4 45 
104 
104 460; 
1046 4461: 
104 462 : 
104 463: 
104 464 : 
ike tee 
1€4 rh ; CPU-SPECIFIC INITIALIZATION OF THE CONSOLE TERMINAL REGISTERS. 
1¢4 468 ; CONSRELEASECTY SHOULD BE CALLED TO RESTORE THE STATE OF THE CONSOLE 
C6 46 ; TERMINAL INTERFACE REGISTERS. 
1€4 159 : INPUTS: 
ah ee 
C6 az : OUTPUTS: 
1¢4 476 : RO: VALUE TO BE RESTORED TO OPACTIVE FLAG WHEN RELEASING CONSOLE TTY 

its 4? Ri: VALUE TO BE RESTORED TO INTERRUPT CSR WHEN RELEASING CONSOLE TTY 

iC t38 : QVSS IS SET UP SO THAT NON-INTERRUPT I/O CAN BE 
106 480 : PERFORMED TO THE CONSOLE TERMINAL. 

Oiee abe 
1€4 ass CONSOWNCTY:: 

50 00009000" GE DO 0104 484 MOVL  G*OPAS$IDB+IDBSL_CSR,RO :GET CSR ADDRESS 
1 60 B60 O1CB 485 MOVW QVCSR_CTL(RO),RT SAVE INTERRUPT ystare 
60 0040 BF AA Ick 4 : BICW  #OQVCSRS$M ENA [NT,QVCSR_CTL(RO) DISABLE INTERRUPTS 
50 00000010'GF 01 02 Ef 103 4 f EXTZV #OPS$V_OPACTIVE,#1,G*OPASCRB+CRBSL_OPFLAGS, ROS SAVE OPACTIVE FLAG 


Page 15 
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ONSOLE 
| ~SBTTL RELEASE CONSOLE TERMINAL 


OPDRVWS1 
vou 006 RELEA 


*CONSRELEASECTY - RELEASE CONSOLE TERMINAL 
FUNCTIONAL DESCRIPTION: 


THIS ROUTINE SHOULD BE CALL ni TO RELINQUISH EXCLUSIVE USE OF THE 


CA 
CONSOLE TERMINAL OBTAINED BY CALLING CONSOWNCTY. IT RESTORES THE 
STATE OF THE CONSOLE. 


to 


WMMMOVVVCVVVVVCVVVVTVVTVVCVVTVTTS 
—OVUeVTVTVFT VT TVTVTVTUTUTVTT9FTCT9T 90 0"0"CT"0"U So. 


3 | “DOOD OCDOOOCOCWOOoVooowowvowovono 


DUPVWPVSPVSPUSISISISISISISIOSIOIIOIT E™ £* ££ EE 


rh 
' 
0; 
INPUTS: 
RO: VALUE RETURNED BY CONSOWNCTY TO BE RESTORED TO OPACTIVE FLAG 
; Ri: VALUE RETURNED BY CONSOWNCTY TO BE RESTORED TO INTERRUPT CSR 
5 : OUTPUTS: 
gi QVSS AND OPACTIVE FLAG ARE RESTORED TO THEIR ORIGINAL STATE. 
§ ONSRELEASECTY:: 
00000010 ' GF 01 02 FO 0 INS #OP$V ryt ie: gh! 7 _OPFLAGS; RESTORE OPACTIVE FLAG 
50 00000000" gr D0 1 MOVL ee apast DB+1 Bs cS :GET CSR 
B0 ; MOVW R1,QVCSR_ cHeeR J *RESTORE INTERRUPT STATE 
05 ; RSB 


OPDRVWS1 = VAX/VMS QVSS CONSOLE TERMINAL ohiver 1 74 AX/VMS Macro v04-0 Page 1 
ira tf = GET A CHARACTER FROM THE CONSOLE vert §-3 -$ oat te 98: ig YOYSLOA. eRe sop uRvuss. MAR; 1 . 3 
fl } -SBTTL = GET A CHARACTER FROM THE CONSOLE TERMINAL 
11 18 : CONSGETCHAR = GET A CHARACTER FROM THE CONSOLE TERMINAL 
iF : FUNCTIONAL DESCRIPTION: 
1F1 : THIS ROUTINE SHOULD BE CALLED T hace: NON-INTERRUPT DRIVEN I/0 
iF} 7 i DIRECTLY TO THE CONSOLE TERMINA 
1F1 5 : INPUTS: 
1F1 § 3 None 
1F1 3 
1F1 8 3; OUTPUTS: 
1F1 3 RO contains the character. 
Hee 
4 4 6d 1F1 § : control_s = 19 ; control s (xoff) 
0000011 O1F1 control_q = 17 ; control q (xon) 
00000001 +8 : qvuart$m_rxrdy = 1 3; receiver ready bit 
o1F § gta 
50 oggongeo's D 1F1 $: mov J “opaSidb+idb$l_csr,r0 ;get qvss csr address 
22 A0 O01 8B 1F8 8 10$: bitw saguer cea. rxrdy,qvcsr_urtstata(r0);receiver ready? 
F 1 1FC 83—s«5§39 beql sif eql not ready 
50 26A0 9A OTF 540 movzbl aqvcsr_urtbufa(r0),r0 et character scan code 
FOFB' 30 020 541 bsbw avss$keydecode sdecede the Lk201 input data 
50 be 0 226 tstl r0 soeed more input? 
ee 07 54 beql 5$ :if eql yes 
05 09 544 rsb return 
020A 545 


sa) 


<3 
03 00000000' GF 


1¢ B3 «©7800 8F 
53 


54 


3E 
<1 ed 
OF 10 A 


0000000' 
00 


10 10 53 
<09g005u~* 
03 10 A 


a 
00000000° 
FD 


| 


0 
0 
i 
003 $ 
A 
G 


A9" 
3€ 


F 
2 
F 
0 
0 
0 
0 
F 
1 


F 


= VAX/VMS QV 
- PUT A CHAR 


BSoosconn ne S38 
Ooooovumnwngo—oom 


us 
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PONE SO OCOWMNMONEOWOP> SP PP rrr >rr>rr>r>r>r>r>r>r>,r 


QUPVDV IVI LV IV SPUSVIVSIVSIUSVSVSVS USSSA VST IOS «=? 
“ 


TER OUT 0 


: FUNCT 


INPUT 


CR Se he Oe Be Oe He Be Oe Be Be ee 
' 
a 


ONSPUT 


2 
of 
oe 


WN OS OONAUES WN OOONAULS WHO OOn~ 


PPO BP A Ee tte a Own 
™~ 
wr 


~“N 
NO 

Ww 

bad 


~—™N 
ooo 


0 80$: 
1 


™m 


OUTPUTS: 
Character written to the console terminal. 


11 
Pmoenbahte en SCHERSISSE BLSRESHE HANES SRESGPBRGRE munss "0° 


SYSLOA.SRCJOPDRVWS1 .MAR; 1 (12) 


~SBTTL = PUT A CHARACTER OUT ON THE CONSOLE TERMINAL 


IONAL DESCRIPTION: 


p++ 
; CONSPUTCHAR = PUT A CHARACTER TO THE CONSOLE TERMINAL 


THIS ROUTINE SHOULD BE CALLED TO DO NON-INTERRUPT DRIVEN I/0 
DIRECTLY TO THE CONSOLE TERMINAL 


S: 


RO = Character to be output 


eenabl sb 
CHAR: : 


pushr #*m<ri,r2.r3,r4,r5> 
moval 9,° a$crb,r 
b op 


bs v_opac 
bbs #exeSv_opa 
brw 80$ 


r 
bec #fop$v_reinit 
movcS #0,(sp),#0,# 


moval 95° ascrb, 
op 

bsbw remap 
r 

movl crb$ 


6, 


r 


ssave registers 

get crb address 
ve,crb$l_opflags(r3),1$;continue if we have control of t 
Gr enetgt_ wet loge. 1oseutput to opa0 enabled? bs yes 
sreturn 


ssave r 

crb$l opt Lage(r5) Ss ctetnts he scan Lines? 

84212871 -acrb$l_video neg ); init memory 
ress 


:get crb a 
v_remap,crbSl_opflags(r3),3$;remap scan Lines to screen? 


zsremap scan Lines to the screen 
srestore r 


video_base(r3),r3 ;get va of video memory 


l 
movl g*opaSidb+idbSi_csr.r4 ;get va of qvss csr 


bsbw yh utchar 
“m<rl,r2.r3,04,r5> 


4 
-dsabl ILsb 


soutput the character 
srestore registers 


1 


OPDR 
v04= 


54 


00000000" EF 
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000 
000 


, ort 
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1E 


FFFFFF9O°EF 


00000,)00 ' GF 
10 AS = 04 


00000 * GF 


F 
0200 
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SYSLOA. SRETOPDRVUSS «MAR: 1 (1 
«SBTTL = INITIALIZE CONSOLE TERMINAL FOR NON-INTERRUPT DRIVEN I/0 


WSINIT_CTY = INITIALIZE QVSS FOR NON-INTERRUPT DRIVEN 1/0 
: NCTIONAL DESCRIPTION: 


rs BOUT INE MUST BE CALLED FROM INIT BEFORE ANY CONSOLE TERMINAL I/O 


IN JTS: 


S: 
VIDEO MEMORY MAPPED. 
1/0 SPACE THAT CONATINS THE CSRS FOR QVSS MAPPED. 


EONS IN IT CTY: : : INITIALIZE QVSS CONTROLLER 


: SAVE REGISTERS 
PUSHR #*M<R1,R2,R3,R4> 


: INITIALIZE THE KEYBOARD TRANSLATION TABLE 
MOVAL QVSSSKEY-112,QVSSSKEYTABLE 


; Initialize OPDRVWS1 state flags 


MOVAL G*OPASCRB,R3 6 
MOVL  #OPSM_OPACTIVE,CRBSL _opFiag 


ET TH HE CRB ADDRESS 
S(R3); OPACTIVE,NORE INIT .NOREMAP ,NOVCACTI 


: GET VIRTUAL ADDRESS OF CSR IN R4 


MOVL G*BOOSGL ~SPTEREL, R2 
INCL  G*BOOSGL~SPTFRE 


GET A FREE SPT 


MOVL aly most 8 =SPTBASE. R1 : Ger VA OF SYSTEM SPT BASE 

MOVAL : GET VA OF SPT PTE 

ASHL 0 J : MAKE VA 

BISL #3 hs SYSTEM,R2 : SET SYSTEM SPACE BIT 

ADDL3 #av CSR_BOFF,R2,R4 ; CALC CSR VIRTUAL ADDRESS 

MOVL 4. GOPASIDB* 16B$L CSR : SAVE IN IDB 

MOVL ScoSESR “VALID!PTEST RU!QVCSR. PFN>,(R1); MAP PA OF CSR TO SYS VA 


CLRL_ oR 
BICW3 #*C<QVCSRSM_MEMBANK> 
ASHL 


“(RGS.RI: GET BASE avss MEMORY BANK 
#-QVCSRS$V_MEMBANK,R1.R1 ; MAKE IT ZERO 
MULL2 one 00,R1 : COMPUTE ex BANK 
ASHL rb : AND ISOLATE 
MOVZWL #51 35" ri : # OF PAGES 
BSBB Ss MAP “PAGES : MAP VIDEO RAM 


RVWS1 = VAX/VMS QVSS CONSOLE TERMINA okiver 16=SEP=1 142 VAX/VMS Mace © V04- 
aati - INITIALIZE CONSOLE FERAINAL FoR NON-IN g- fp 1382 8} 96: if YOYSLDA. SRCJOPDRVUS .MAR;1 
08 E C BLBC RQ.100 : NO SPTS THEN EXIT 
1C A3 D ¢C 4 MOVL R ta _VIDEO_BASE(R3) ; SAVE STARTING VA OF BITMAP 
1 D 4 BSBB : MAP THE S 
50 0000°8F 3C 02D 44 MOVZWL ass NORMAL ,RO : INDICATE SUCCESS 
iE BA D9 645 100$:  POPR M<R1,R2,R3,R4> 
5 0208 G46 RSB 
DC 64 
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TTOTTHE SCREEN 'ScSEP=1986 Qusttite ESySLOA.SRESGPDRVUS! .mar;1 29° 79) 


-SBTTL REMAP = MAP VIDEO RAM TO THE SCREEN 


Vv NSO 


a 


OPDRVWS1 = VAX/VMS Q 
vo4-008 REMAP = MAP 


me 
oo 
mam 
= 


D 
3¢ 

: REMAP 

; Map the first 24 scan Lines to the screen. 

; Inputs: 

R3 - CRB Address for OPAO 


Outputs: 
RO,R1,R2 destroyed 


Implicit Outputs: 
Scan Lines map video ram to the screen. 


3; Side Effects: 
; None. 


IA AAPIPIPIPIPIPDINYINININIPIPIPINDIPPIPIPIPIPIPIPMNPMNNIMNININPININONIY 


OOOO MN MMMMMMoOCOVCVCVVTVTVVTVTVTVTVTVT TOT TCC"C0C00C0C90" 


SAWN FR NUVIWUE FB DUM MOOMAOOOOOOOOOOOAOOOAOOOOOO 
©0200 09 09 09 09 09 09 SI NI NIN SINS NS NP AA AAA AAOAOAUMIUMIMIUIUIVIVIVIILN Ee 


NOUS WN SO OD NAU EWN SO OO NOAUE WO OONAUES WOO 
** 


PAEAAAAAAAAAAAAAAAAAOAAOAOAOOAPOOOOSOAOSOOSOOAS <H 


| 
0 REMAP: 
0 ; INIT THE SCAN MAP AND MAP SCREEN FULL OF LINES 
S52. 1C A’ 0003F800 BF C1 § ADDL3 #QVSCAN_MAP,CRBSL_VIDEO_BASE(R3),R2; COMPUTE ADDRESS OF SCAN MAP 
1403 D TSTL  CRBSL_SCAN_MAP(R3) ; SCAN MAP SAVE AREA? 
0B 1 BEQL h : IF EQL NO 
3C Me PUSHR #°M<R2,R3.R4,R5> > SAVE REGISTERS 
16 B3 62 O1€0 er 2 MOVCS #24*10#2, (R25 ,@CRBSL_SCAN_MAP(R3); SAVE SCAN MAP 
C BA 0 POPR #*M<R2,R$,R4,R5> : "RESTORE REGISTERS 
504 5$ CLRL Rg 
51 Q00000FO BF D0 MOVL #24*10,R1 ; NUMBER OF SCAN MAPS 
82 50 B80 10$:  MOVW RO, (R25+ 
50 D6 0 INCL R 
F851 FS (0 SOBGTR R1,10$ 
05 0 RSB 


<o 


oc 


N11 
ES = RAP PHYSIEALLY-CONTIGUOUS PA S-SEP=1986 Sustists LersLOA.ceedopyRvuss .mar;1 28° (9, 
~ ~SBTTL MAP_PAGES = MAP PHYSICALLY=CONTIGUOUS PAGES 
: MAP _PAGES 
; Map to system virtual address space N physically-contiguous pages. 


OPDRVWS1 = VAX 
vou-008 MAP _P 


>™ 
ox 
wv 


= N = number of physically-contiguous pages 
= Starting PFN ae . in 


RO = status: SUCCESS, INSFMEM, INSFSPTS 

Ri = preserved 

R2 = system virtual address of N pages of memory if success 
all other registers preserved 


OOCCCOCOCOOOOOOOCOOoO 
WAAL AI 


SOOOOOOOOOSOOCOOOCOOCOOOSOOOSOSOOOOOCOOOOOOOOOoO 


Implicit Outputs: 
None. 


ts: 


Side Effects: 
IOCSALLOSPT called - so SPTs are allocated 


MAP_PAGES: 

PUSHR #*M<R1,R3,R4,R5> ; save work registers 
: rl = input used as loop counter 
:; 3 = address of SPT 
; 4 = index into PFN database 
; _r5 = temp storage 


3A OBB 


MOVL _—RO, RS 
JSB G*fOCSALLOSPT 
BLBC ~—RO, 308 


; IOCSALLOSPT returns: 
; R1 = preserved, R2 = SVPN (index into SPT), R3 = address of SPT 


: The main loop indexes backwards through the system page table entries 


Save eters tog PF 
9) ‘ecate N SPTs to map VAs 


55 50 00 
00000000'GF 16 
31 50 =€9 LBC, no system page table slots 


; and backwards through the PFN database. It goes backwards so that the 
; last system virtual address calculated can be returned to the caller. 


r0 = index into SPT 


PIANWNAN.AA AAAI AIA AIAN AIAN AAI AAAI AAAI AAI WIA 


- Um?.hUMmhCUR ADDL R1,R2,R0 : start at last SPT and go backwards 
= St @ €9 ADOL R5,R1,R4 3; start PFNs at end in loo 
10$: ; set up arenes page-table entry 
50 07 DECL RO : back up SVPN index 
54 D7 DECL R4 3; back up PFN index 
6340 at 0? MOVL R4,(R3) CROJ : fitt PFN in SPT 
6340 A0000000 8F C BISL2 #<PTESC_UW!PTESM_VALID>, (R CRO] ; user mode access, valid 
> Invalidate system virtual address 
5 50 99 7 ; ASHL #9 RO R2 ; turn SVPN into VA 
52 80000000 8F C BISL2 a#<fasi>,R2 ; make VA a system VA 
INVALID Re ; and clear translation buffer 
DF 51 =F5 SOBGTR R1,10$ ; loop N times 
50 Q000°8F 3C¢ MOVZWL #SS$_NORMAL ,RO ; indicates success (R2 has system VA) 


vou-000. sal MBCUEE SYASoCBMROLEATERMUMML BRAVE, TESERISRS 1:08:42 YNCMMG tere yOA=00 mars "2° (5, 


3A 4 t3 reg 15$: POPR #*M<R1,R3,R4,R5> ; restore work registers 
0000' 8F f 46 res 30$: MOVZWL $525.08S" SPTS RO ; no SPTs left 
F6 is ie BRB 1 3; return 
4D 731 CON_END 
4D ©6752 «END 


Sa 
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Symbol table =SEP=1984 04:11:1 SYSLOA.SRCJ OPDRVWS «MAR; 1 2) 


ADPSL_VECTOR = 10 oie V_BUTTOG = 5 
pore. = po0n070 rev OUT = go0n0095 
BOoSGc, spre REL sessesse X02 REVAVHOLD 
Ss 
“GE TNXT z Y$V- SHIFT s 
at te = MAP_PRGES R 0s 
CLASSCPUTNT = 29090064 ANGEL. SPreAsE ressease x 
A UP_U = # : 
EONEABOR AS ec 02 RSAC RENT = 8900900 
Ss s 
CONSDTSCONNECT F6 RG OPSM_VCACTIVE = 
B05 set FS fe GPsy-DPACIIVE 
poets AE L 0 RG v- EMAP = 8 } 
CONSINITLINE g RG OP$V_VCACTIVE = 
SINT ict OPASCRE a 
N 
CONS INTO B00 199 RG OPASVECTOR ekekrene 8 
ut OD0G00F5 fe Pee. Tels pe 
CONSPUTCHAR 0990 MGA RG PRS TXDB = 09028 
CONSRELEASECTY 3 108 RG PTESC ku = 10000000 
CONSRE SUME 8 0001A3 RG PTESC_UW = 5444 
CONSSENDCONSCMD 0001A4 RG 0 PTESM’ VALID = 38 000 
CONSSET_LINE 8608 OFS RG 0 QVCSRSM _BUTA = 444 
CONSE RODEN Gp00rs Re Og «AVE SRSA-BUTE = 90090200 
Sar Barc i RRR a : ASS 
CONBXOFF SO OOoT A RG 0 QVCSRSM_ENA VIDEO = 4 444 
CONTROL_Q = 00000011 QVCSRSM_MEMBA = 00007800 
CONTROL S = 00000013 QvC RSM_MODE19 = 00000001 
END™ 00 4D R 02 QVCSR$S_BUTA s 444d 
CRnse AUXSTRUC = 00000010 QVCSR$S_BUTB = b8 01 
CRBSL~INTD = 00000024 QVCSR$S_BUT = 00 90001 
= 00 0 QVCSRS$S_CURS_FNC = 00000001 
= 00000014 QVCSRS$S_ENA_ = 00000001 
= 00000014 QVCSRS$S_ENA_VIDEO = 00000001 
= 0000001C QVCSRS$S_MEMBANK = 00 4 
= 000 1C QVCESRS$S_MODE1 = 00000001 
= C QVCSR$V_BUT = 00000008 
s E QVCSR$V_BUTB = 00000009 
teereree x QVCSRS$V~BUTC = 0000000A 
cinewese aVCSRBV-CURS, Fc : RSS 
2eeeaeeee 
: 0 QVCSRSV~ENA-VIDEO = 0000 
: BR SEALE : 
Reeaeeeee = 
secvetes 8 OvCSR BOFF : G 
: QVCSR7CRTADDR : G 
s QVCSR_CRTDATA s A G 
= QVCSR_CTL = g G 
= 1 QVCSR_CURPOS = G 
= QVCSR_INTCTL = —E G 
z QVCSRTINTDATA 2 c & 
= QVCSR_MOUSE = G 
= QVCSR OFFSET s 1E80 G 
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Symbol table 


QVCSR 


QVSSSKEY 
QVSSSKEYDECODE 
QVSSSKEYTABLE 
a oD a 


SUCODE 
QVSVIDEO_SIZE 
QVUARTSM~RXRDY 


RE 
SCAN_MAP 


uC 
UCBS$L~TT~PORT 
UCBSL~TT~PUTNXT 


cccce 
A000 
J 


UCBSW" TT_OUTLEN 
vVASM_SYSTEM 
VECS$S0_DISPATCH 
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PEON 


| 
F 
F 
OOSFFE 
eeerenee 
eeerenee 


RARE 
RRARRRRER 


eeteeeee 
eeeeeeee 
00001000 
0000000 
1000000 
0000000 
0001000 


RRERRKEE 
RREEKRET 
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DOAQAADAAAGAAG 


<x 


<< 
oo 
ror 


be Ouitiiits 


AX/VMS Macro 
SYSLOA.SRCJOPDRVWS 


9 aR: 1 


rae 


OPDRVWS1 
Psect synopsis 


1 
= VAX/VMS QVSS CONSOLE TERMINAL DRIVER 


"SrSEp=1986 Qasttite ES¥SLOR. SRedOPD 


! Psect synopsis ! 


tata ew cee see ee een} 


PSECT name Allocation PSECT No. Attributes 
ABS 0000000 ( -> 00 ¢ 0.) NOPIC USR CON ABS LCL NOSHR NOEXE 
S$ 0000000 ( -) Q1¢ #1.) NOPIC USR CON ABS LCL NOSHR- EXE 
SYSLOA 000054D (¢ 845.) 02 ¢ 2.) NOPIC USR CON REL LCL NOSHR EXE RD 
Poorer aeccecooe eeeceeeen eceoae $ 
H Performance indicators H 
Phase Page faults CPU Time Elapsed Time 
Initialization 9 0: _ 0. 3 00:00:02.7 
pomnend processing 107 0:00:00. H's «4 
s 1 534 Bo: 0:14.38 B:8 :50.5 
Syabol table sort 0 0:00:02.31 0:00:10.10 
Pass 2 141 4 74 ee a? 
Symbol table output 21 :00:00.12 0:00:00.38 
Psect synopsis output § 00:00:00.01 BF OD RR «Be 
Cross-reference output 00:00:00.00 0:00:00.00 
Assembler run totals 836 00:00:19.97 00:01:20.87 


The ¥9 rking set — was 1650 pages. 

118953 bytes (235 pages) of virtual memory were used to buffer the intermediate code. 

There were 120 pages of symbol table space allocated to hold non-local and 59 local symbols. 
2 source Lines were read in Pass 1, producing 17 object records in Pass 2. 

59 pages of virtual memory were used to define 56 macros. 
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Macro Library name 


$255SDUA g: SYS.OBJJLIB.MLB;1 27 
$255$DUA28 :(SYSLIBJSTARLET. MLB; 2 9 
Terare (all libraries) 36 


2548 GETS were required to define 36 macros. 
There were no errors, warnings or information messages. 
MACRO/LIS=L1IS$:OPDRVWS1/0BJ=OBJ$:OPDRVWS1 MSRC$:OPDRVWS1/UPDATE=(ENHS$:OPDRVWS1) +EXECMLS$/LIB 


NORD NOWRT NOVEC BYTE 
RD R 


WRT NOVEC BYTE 
WRT NOVEC LONG 
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